home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / ADDONS.ZIP / PERVKICK.TXT < prev    next >
Text File  |  1997-01-04  |  971b  |  26 lines
  1. This script Will be a part of []baz▀ot[] v2.╪ made by Ronny 1996 ⌐
  2. the current script was made by baz`oo`ka.
  3.  
  4. All you need to do is to add the folowing in to the indicated section of tools
  5.  
  6. Version 1.0
  7.  
  8. Remote / Events:
  9.  
  10. 1:on join:#: { if ($me isop $chan) && (($nick != W) || ($nick != X)) { %schan = $chan | .enable #checkchan | whois $nick } | else { halt } }
  11.  
  12. Remote / Raw:
  13.  
  14. #checkchan disabled
  15. 319:*: {
  16.   %checkchan = $parms | %checknum = $count(%checkchan,$chr(32)) + 1 | %i = 0 | :loop | inc %i 
  17.   if (%i > %checknum) { goto end } 
  18.   else { 
  19.     %checkreal = $remove($token(%i,32,%checkchan),$chr(64))
  20.     if (teen isin %checkreal) && ((sex isin %checkreal) || (pic isin %checkreal)) { ban -u300 %schan $parm2 3 | kick %schan $parm2 º╗í½º []baz▀ot[] Perv KiDDiE Channel Detected ( $+ %checkreal $+ ) 5 Minute Ban! []baz▀ot[] º╗í½º | goto end }  
  21.   else { goto loop } } 
  22.   :end | .disable #checkchan | unset %check* 
  23. }
  24. #checkchan end
  25.  
  26.